home *** CD-ROM | disk | FTP | other *** search
/ ShareWare OnLine 2 / ShareWare OnLine Volume 2 (CMS Software)(1993).iso / win2 / wr21.zip / WORDSEQ.FOR < prev   
Text File  |  1993-02-10  |  3KB  |  105 lines
  1. /* Formats suitable for use "naked" with Word for Windows */
  2. /* This version numbers citations in the order in which they appear in the document */
  3. /* Si Dobson, 10-2-1993 */
  4.  
  5. description "Word for Windows (citation-ordered numbers)"
  6.  
  7. /* use RTF to communicate with Word */
  8. language { RTF }
  9.  
  10. /* tags are complicated... */
  11. tag { "["
  12.       "{\field{\*\fldinst set "
  13.       MajorAuthor(Surname) Date(Century) Unique
  14.       " {\field{\*\fldinst seq Reference}{\fldrslt 1}}"
  15.       "}{\fldrslt 1}}"
  16.       "{\field{\*\fldinst seq Reference \\c}{\fldrslt 1}}"
  17.       "]" }
  18.  
  19. /* paper from journal */
  20. format { Title Authors Journal [ Vol No ] Date [ Pages ] [ Others ] }
  21. as { "["
  22.      "{\field{\*\fldinst ref "
  23.      MajorAuthor(Surname) Date(Century) Unique
  24.      "}{\fldrslt 1}}"
  25.      "]" Tab
  26.      Authors
  27.      ", " 66 italic { Title "," } 99
  28.      " " Journal [ " " Vol [ "(" bold { No } ")" ] ] " (" Date ")" [ " pp." Pages ]
  29.      "."
  30.      [ "  " Others "." ]
  31.      Para }
  32.  
  33. /* paper in book */
  34. format { Title Authors Book [ Editors ] [ Publisher [ City ] ] [ Date] [ Pages ] [ Others ] }
  35. as { "["
  36.      "{\field{\*\fldinst ref "
  37.      MajorAuthor(Surname) Date(Century) Unique
  38.      "}{\fldrslt 1}}"
  39.      "]" Tab
  40.      Authors
  41.      ", " 66 italic { Title "," } 99
  42.      [ ", pp." Pages ]
  43.      " in " Book
  44.      [ ", ed. " Editors ]
  45.      [ ", " Publisher [ ", " City ] ] [ " (" Date ")" ]
  46.      "."
  47.      [ "  " Others "." ]
  48.      Para }
  49.  
  50. /* book */
  51. format { Title Authors Publisher [ City ] Date [ Others ] }
  52. as { "["
  53.      "{\field{\*\fldinst ref "
  54.      MajorAuthor(Surname) Date(Century) Unique
  55.      "}{\fldrslt 1}}"
  56.      "]" Tab
  57.      Authors
  58.      ", " 66 italic { Title "," } 99
  59.      " " Publisher [ ", " City ] [ " (" Date ")" ]
  60.      "."
  61.      [ "  " Others "." ]
  62.      Para }
  63.  
  64. /* technical report */
  65. format { Title Authors Publisher [ City ReportNo ] Date [ Others ] }
  66. as { "["
  67.      "{\field{\*\fldinst ref "
  68.      MajorAuthor(Surname) Date(Century) Unique
  69.      "}{\fldrslt 1}}"
  70.      "]" Tab
  71.      Authors
  72.      ", " 66 italic { Title "," } 99 " "
  73.      [ ReportNo ", " ]
  74.      Publisher [ ", " City ] " (" Date ")"
  75.      "."
  76.      [ "  " Others "." ]
  77.      Para }
  78.  
  79. /* commercial technical document */
  80. format { Title Publisher [ City ] Date [ Others ] }
  81. as { "["
  82.      "{\field{\*\fldinst ref "
  83.      MajorAuthor(Surname) Date(Century) Unique
  84.      "}{\fldrslt 1}}"
  85.      "]" Tab
  86.      Publisher
  87.      ", " 66 italic { Title "," } 99 " "
  88.      [ City ", " ]
  89.      "(" Date ")"
  90.      "."
  91.      [ "  " Others "." ]
  92.      Para }
  93.  
  94.  
  95. /* anything else */
  96. format { Author Date [ Others ] }
  97. as { "["
  98.      "{\field{\*\fldinst ref "
  99.      MajorAuthor(Surname) Date(Century) Unique
  100.      "}{\fldrslt 1}}"
  101.      "]" Tab
  102.      Authors " (" Date ")."
  103.      [ "  " Others "." ]
  104.      Para }
  105.